#3.    Given a = `+`(`-`(`*`(`^`(x, 2))), 3), b = `+`(`-`(`/`(1, `*`(x)))); and find the value of: 

> restart;
 

> a := `+`(`-`(`*`(`^`(x, 2))), 3); 1; b := `+`(`-`(`/`(1, `*`(x)))); 1; c := `+`(`-`(2), x)
 

 

 

Typesetting:-mprintslash([a := `+`(`-`(`*`(`^`(x, 2))), 3)], [`+`(`-`(`*`(`^`(x, 2))), 3)])
Typesetting:-mprintslash([b := `+`(`-`(`/`(1, `*`(x))))], [`+`(`-`(`/`(1, `*`(x))))])
Typesetting:-mprintslash([c := `+`(`-`(2), x)], [`+`(`-`(2), x)]) (2.3.1)
 

> `/`(`*`(`+`(`/`(1, `*`(a)), `/`(1, `*`(b)))), `*`(`+`(`/`(1, `*`(a)), `-`(`/`(1, `*`(b))))));
 

`/`(`*`(`+`(`/`(1, `*`(`+`(`-`(`*`(`^`(x, 2))), 3))), `-`(x))), `*`(`+`(`/`(1, `*`(`+`(`-`(`*`(`^`(x, 2))), 3))), x))) (2.3.2)
 

> simplify(`/`(`*`(`+`(`/`(1, `*`(`+`(`-`(`*`(`^`(x, 2))), 3))), `-`(x))), `*`(`+`(`/`(1, `*`(`+`(`-`(`*`(`^`(x, 2))), 3))), x))));
 

`/`(`*`(`+`(`-`(`*`(`^`(x, 3))), `*`(3, `*`(x)), `-`(1))), `*`(`+`(`*`(`^`(x, 3)), `-`(`*`(3, `*`(x))), `-`(1)))) (2.3.3)
 

>
 

> `+`(a, `/`(`*`(2), `*`(b)));
 

`+`(`-`(`*`(`^`(x, 2))), `-`(`*`(2, `*`(x))), 3) (2.3.4)
 

>
 

> `+`(`/`(1, `*`(`^`(`+`(a, c), 2))), `/`(1, `*`(`^`(`+`(c, `-`(`/`(1, `*`(a)))), 2))));
 

`+`(`/`(1, `*`(`^`(`+`(`-`(`*`(`^`(x, 2))), x, 1), 2))), `/`(1, `*`(`^`(`+`(`-`(2), x, `-`(`/`(1, `*`(`+`(`-`(`*`(`^`(x, 2))), 3))))), 2)))) (2.3.5)
 

> simplify(`+`(`/`(1, `*`(`^`(`+`(`-`(`*`(`^`(x, 2))), x, 1), 2))), `/`(1, `*`(`^`(`+`(`-`(2), x, `-`(`/`(1, `*`(`+`(`-`(`*`(`^`(x, 2))), 3))))), 2)))));
 

`/`(`*`(`+`(`*`(`^`(x, 8)), `-`(`*`(2, `*`(`^`(x, 7)))), `-`(`*`(6, `*`(`^`(x, 6)))), `*`(10, `*`(`^`(x, 5))), `*`(14, `*`(`^`(x, 4))), `-`(`*`(4, `*`(`^`(x, 3)))), `-`(`*`(34, `*`(`^`(x, 2)))), `-`(`... (2.3.6)
 

> `/`(`*`(`+`(`*`(`^`(x, 2)), `*`(`+`(b, a), `*`(x)), `*`(a, `*`(b)))), `*`(`+`(`*`(`^`(x, 2)), `*`(`+`(a, c), `*`(x)), `*`(c, `*`(a)))));
 

`/`(`*`(`+`(`*`(`^`(x, 2)), `*`(`+`(`-`(`*`(`^`(x, 2))), 3, `-`(`/`(1, `*`(x)))), `*`(x)), `-`(`/`(`*`(`+`(`-`(`*`(`^`(x, 2))), 3)), `*`(x))))), `*`(`+`(`*`(`^`(x, 2)), `*`(`+`(`-`(`*`(`^`(x, 2))), x,... (2.3.7)
 

> simplify(`/`(`*`(`+`(`*`(`^`(x, 2)), `*`(`+`(`-`(`*`(`^`(x, 2))), 3, `-`(`/`(1, `*`(x)))), `*`(x)), `-`(`/`(`*`(`+`(`-`(`*`(`^`(x, 2))), 3)), `*`(x))))), `*`(`+`(`*`(`^`(x, 2)), `*`(`+`(`-`(`*`(`^`(x,...
 

`+`(`/`(`*`(`/`(1, 2), `*`(`+`(x, 1))), `*`(x))) (2.3.8)